home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 April: Mac OS SDK / Dev.CD Apr 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / PInterfaces / CMPRComponent.p < prev    next >
Encoding:
Text File  |  1995-07-06  |  2.7 KB  |  115 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        CMPRComponent.p
  3.  
  4.      Contains:    ColorSync ProfileResponder Components Interface 
  5.  
  6.      Version:    Technology:    ColorSync 2.0
  7.                  Package:    Universal Interfaces 2.1 in “MPW Latest” on ETO #18
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs@applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. }
  19.  
  20. {$IFC UNDEFINED UsingIncludes}
  21. {$SETC UsingIncludes := 0}
  22. {$ENDC}
  23.  
  24. {$IFC NOT UsingIncludes}
  25.  UNIT CMPRComponent;
  26.  INTERFACE
  27. {$ENDC}
  28.  
  29. {$IFC UNDEFINED __CMPRCOMPONENT__}
  30. {$SETC __CMPRCOMPONENT__ := 1}
  31.  
  32. {$I+}
  33. {$SETC CMPRComponentIncludes := UsingIncludes}
  34. {$SETC UsingIncludes := 1}
  35.  
  36.  
  37. {$IFC UNDEFINED __TYPES__}
  38. {$I Types.p}
  39. {$ENDC}
  40. {    ConditionalMacros.p                                            }
  41.  
  42. {$IFC UNDEFINED __QUICKDRAW__}
  43. {$I Quickdraw.p}
  44. {$ENDC}
  45. {    MixedMode.p                                                    }
  46. {    QuickdrawText.p                                                }
  47.  
  48. {$IFC UNDEFINED __COMPONENTS__}
  49. {$I Components.p}
  50. {$ENDC}
  51.  
  52. {$IFC UNDEFINED __CMAPPLICATION__}
  53. {$I CMApplication.p}
  54. {$ENDC}
  55. {    Files.p                                                        }
  56. {        OSUtils.p                                                }
  57. {            Memory.p                                            }
  58. {        Finder.p                                                }
  59. {    Printing.p                                                    }
  60. {        Errors.p                                                }
  61. {        Dialogs.p                                                }
  62. {            Menus.p                                                }
  63. {            Controls.p                                            }
  64. {            Windows.p                                            }
  65. {                Events.p                                        }
  66. {            TextEdit.p                                            }
  67. {    CMICCProfile.p                                                }
  68.  
  69. {$PUSH}
  70. {$ALIGN MAC68K}
  71. {$LibExport+}
  72.  
  73. CONST
  74.     CMPRInterfaceVersion        = 0;
  75.  
  76. { Component function selectors }
  77.     kCMPRGetProfile                = 0;
  78.     kCMPRSetProfile                = 1;
  79.     kCMPRSetProfileDescription    = 2;
  80.     kCMPRGetIndexedProfile        = 3;
  81.     kCMPRDeleteDeviceProfile    = 4;
  82.  
  83.  
  84. FUNCTION CMGetProfile(pr: ComponentInstance; aProfile: CMProfileHandle; VAR returnedProfile: CMProfileHandle): CMError;
  85.     {$IFC NOT GENERATINGCFM}
  86.     INLINE $2F3C, 8, 0, $7000, $A82A;
  87.     {$ENDC}
  88. FUNCTION CMSetProfile(pr: ComponentInstance; newProfile: CMProfileHandle): CMError;
  89.     {$IFC NOT GENERATINGCFM}
  90.     INLINE $2F3C, 4, 1, $7000, $A82A;
  91.     {$ENDC}
  92. FUNCTION CMSetProfileDescription(pr: ComponentInstance; DeviceData: LONGINT; hProfile: CMProfileHandle): CMError;
  93.     {$IFC NOT GENERATINGCFM}
  94.     INLINE $2F3C, 8, 2, $7000, $A82A;
  95.     {$ENDC}
  96. FUNCTION CMGetIndexedProfile(pr: ComponentInstance; search: CMProfileSearchRecordHandle; VAR returnProfile: CMProfileHandle; VAR index: LONGINT): CMError;
  97.     {$IFC NOT GENERATINGCFM}
  98.     INLINE $2F3C, 12, 3, $7000, $A82A;
  99.     {$ENDC}
  100. FUNCTION CMDeleteDeviceProfile(pr: ComponentInstance; deleteMe: CMProfileHandle): CMError;
  101.     {$IFC NOT GENERATINGCFM}
  102.     INLINE $2F3C, 4, 4, $7000, $A82A;
  103.     {$ENDC}
  104.  
  105. {$ALIGN RESET}
  106. {$POP}
  107.  
  108. {$SETC UsingIncludes := CMPRComponentIncludes}
  109.  
  110. {$ENDC} {__CMPRCOMPONENT__}
  111.  
  112. {$IFC NOT UsingIncludes}
  113.  END.
  114. {$ENDC}
  115.